﻿Module ExamGlobal
    Dim USER_ID As Integer
    Dim CURRENT_LOGIN_NAME As String '当前考试考生登录帐号
    Dim Delimiter() As String = {"|", "|"}


    Public Property TEACHER_ID As Integer
        Get
            Return USER_ID
        End Get
        Set(value As Integer)
            USER_ID = value
        End Set
    End Property

    Public Property LOGIN_NAME As String
        Get
            Return CURRENT_LOGIN_NAME
        End Get
        Set(value As String)
            CURRENT_LOGIN_NAME = value
        End Set
    End Property

    Public Property Spliter As String()
        Get
            Return Delimiter
        End Get
        Set(value As String())
            Delimiter = value
        End Set
    End Property

End Module
